home *** CD-ROM | disk | FTP | other *** search
/ MacWorld 2003 August / MW 8 2003 CD1.iso / Inside Macworld / Product News / gimp-1.2.4.sit / gimp-1.2.4 / plug-ins / perl / Gimp / Module.pm < prev    next >
Encoding:
Perl POD Document  |  2003-01-14  |  672 b   |  58 lines
  1. =head1 NAME
  2.  
  3.  Gimp::Module - run scripts embedded into the Gimp program.
  4.  
  5. =head1 SYNOPSIS
  6.  
  7.  not anything you would expect - and not documented, even!
  8.  
  9. =head1 DESCRIPTION
  10.  
  11. =head1 FUNCTIONS
  12.  
  13. =over 4
  14.  
  15. =cut
  16.  
  17. package Gimp::Module;
  18.  
  19. use base qw(DynaLoader);
  20. require DynaLoader;
  21.  
  22. $VERSION=1.211;
  23.  
  24. bootstrap Gimp::Module;
  25.  
  26. #use Gtk;
  27. #init Gtk;
  28.  
  29. sub _init {
  30. #   my $w = new Gtk::Window;
  31. #   my $l = new Gtk::Label "Test";
  32. #   $w->add($l);
  33. #
  34. #   $w->show_all;
  35. #   Gtk->main_iteration while Gtk::Gdk->events_pending;
  36. #   Gtk::Gdk->flush;
  37. #   $w->destroy;
  38.  
  39.    &GIMP_MODULE_OK;
  40. }
  41.  
  42. sub _deinit {
  43. }
  44.  
  45. 1;
  46.  
  47. =pod
  48.  
  49. =back
  50.  
  51. =head1 SEE ALSO
  52.  
  53. L<Gimp>.
  54.  
  55. =head1 AUTHOR
  56.  
  57. Marc Lehmann <pcg@goof.com>
  58.